#include <iostream>
#include <string>
#include <cstring>
#include <unistd.h>
#include <stdlib.h>
#include <ctype.h>
#include <unordered_map>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>

#include "Log.hpp"

using namespace std;

// 使用手册
static void Usage(const std::string porc)
{
    std::cout << "Usage:\n\t" << porc << " port [ip]" << std::endl;
}

// 我们想写一个简单的udpSever
// 云服务器有一些特殊情况：
// 1. 禁止你bind云服务器上的任何确定IP， 只能使用INADDR_ANY，如果你是虚拟机，随意
class UdpServer
{
public:
    UdpServer(int port, std::string ip = "") : port_((uint16_t)port), ip_(ip), sockfd_(-1)
    {}
    ~UdpServer()
    {}

public:
    // udp服务器，只需要，1. 创建套接字 2. 填充信息之后做绑定，绑定完成之后就算完成
    void init()
    {
        // 1. 创建socket套接字
        sockfd_ = socket(AF_INET, SOCK_DGRAM, 0); // 就是打开了一个文件
        if (sockfd_ < 0)
        {
            logMessage(FATAL, "socket:%s:%d", strerror(errno), sockfd_);
            exit(1);
        }

        // 日志
        logMessage(DEBUG, "socket create success: %d", sockfd_);

        // 2. 绑定网络信息，指明ip + port
        // 2.1 先填充基本信息到 struct sockaddr_in
        struct sockaddr_in local;     // local在哪里开辟的空间? 用户栈，就是临时变量，我们要将其写入内核中
        bzero(&local, sizeof(local)); // 也可以用memset

        // 填充协议家族，域
        local.sin_family = AF_INET;   // 这个family就是前16位，确定是本地通信还是网络通信，也可以用PF_INET是一样的

        // 填充服务器对应的端口号信息，一定是会发给对方的，port_一定会到网络中
        local.sin_port = htons(port_);

        // 服务器都必须具有IP地址,"xx.yy.zz.aaa",字符串风格点分十进制 -> 4字节IP -> uint32_t ip
        // INADDR_ANY(0): 程序员不关心会bind到哪一个ip， 任意地址bind，强烈推荐的做法，所有服务器一般的做法
        // inet_addr: 指定填充确定的IP，特殊用途，或者测试时使用，除了做转化，还会自动给我们进行 h—>n (主机转网络)
        local.sin_addr.s_addr = ip_.empty() ? htonl(INADDR_ANY) : inet_addr(ip_.c_str());

        // 2.2 bind 网络信息 -- 将数据填入到操作系统里
        if (bind(sockfd_, (const struct sockaddr *)&local, sizeof(local)) == -1)
        {
            logMessage(FATAL, "bind: %s:%d", strerror(errno), sockfd_);
            exit(2);
        }

        logMessage(DEBUG, "socket bind success: %d", sockfd_);
    }

    void start()
    {
        char inbuffer[1024];  // 将来读取到的数据，都放在这里
        char outbuffer[1024]; // 将来发送的数据，都放在这里

        // 服务器设计的时候，服务器都是死循环
        while (true)
        {
            // 远端
            struct sockaddr_in peer;      // 输出型参数
            socklen_t len = sizeof(peer); // 输入输出型参数

            // demo2
            // UDP是无连接的
            // 对方给你发了消息，你想不想给对方回消息？
            // 要的！后面的两个参数是输出型参数，发消息的一方会将属性写到对应的peer和len当中
            // 不断地从网络当中进行数据读取:
            ssize_t s = recvfrom(sockfd_, inbuffer, sizeof(inbuffer) - 1, 0,
                                 (struct sockaddr *)&peer, &len);

            // 数据已经读到了吧
            if (s > 0)
            {
                inbuffer[s] = 0; // 当做字符串
            }
            else if (s == -1)
            {
                logMessage(WARINING, "recvfrom: %s:%d", strerror(errno), sockfd_);
                continue;
            }

            // 谁发的消息，将对方的信息提取出来:
            // 读取成功的，除了读取到对方的数据，你还要读取到对方的网络地址[ip:port]
            std::string peerIp = inet_ntoa(peer.sin_addr);  // 拿到了对方的IP
            uint32_t peerPort = ntohs(peer.sin_port);       // 拿到了对方的port

            // 检查在线用户
            checkOnlineUser(peerIp, peerPort, peer); // 如果存在，什么都不做，如果不存在，就添加

            // 打印出来客户端给服务器发送过来的消息
            logMessage(NOTICE, "[%s:%d]# %s", peerIp.c_str(), peerPort, inbuffer);

            for (int i = 0; i < strlen(inbuffer); i++)
            {
                if(isalpha(inbuffer[i]) && islower(inbuffer[i]))
                    outbuffer[i] = toupper(inbuffer[i]);
                else
                    outbuffer[i] = toupper(inbuffer[i]);
            }

            messageRoute(peerIp, peerPort, inbuffer); // 消息路由

            // 谁给我发消息，立马转回去
            sendto(sockfd_, outbuffer, strlen(outbuffer), 0, (struct sockaddr*)&peer, len);

            // demo1
            // logMessage(NOTICE, "server 提供 service 中....");
            // sleep(1);
        }
    }

    void checkOnlineUser(std::string &ip, uint32_t port, struct sockaddr_in &peer)
    {
        std::string key = ip;
        key += ":";
        key += std::to_string(port);
        auto iter = users.find(key);
        if(iter == users.end())
        {
            users.insert({key, peer});
        }
        else
        {
            // iter->first, iter->second->
            // do nothing
        }
    }

    void messageRoute(std::string ip, uint32_t port, std::string info)
    {
        std::string message = "[";
        message += ip;
        message += ":";
        message += std::to_string(port);
        message += "]# ";
        message += info;

        // 给每个在线用户都发回去
        for(auto &user : users)
        {
            sendto(sockfd_, message.c_str(), message.size(), 0, (struct sockaddr*)&(user.second), sizeof(user.second));
        }
    }
private:
    // 服务器必须得有端口号信息
    uint16_t port_;
    // 服务器必须得有ip地址
    std::string ip_;
    // 服务器的socket fd信息
    int sockfd_;
    // onlineuser
    std::unordered_map<std::string, struct sockaddr_in> users;
};

// ./udpServer port [ip]
int main(int argc, char *argv[])
{
    if (argc != 2 && argc != 3) // 反面：argc == 2 || argc == 3
    {
        Usage(argv[0]);
        exit(3);
    }

    uint16_t port = atoi(argv[1]);
    std::string ip;

    if (argc == 3)
    {
        ip = argv[2];
    }

    UdpServer svr(port, ip);
    svr.init();
    svr.start();

    return 0;
}